
# set working directory path to replication folder IFoT_rep
curcomp <- "C:/Users/iosgood/Dropbox/Divisions over supply chain/IFoT_rep" 
setwd(curcomp)

# replicate all tables and figures in the main text except for table 4 and figures 1,2
setwd(curcomp)
source("code/IFoT_repcode_main.R")

# replicate online appendix
setwd(curcomp)
source("code/IFoT_repcode_addmodels.R")

# replicate table 4 and figures 1,2
setwd(curcomp)
source("code/IFoT_repcode_alltrade.R")
